home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 60.zip
/
BS1 part 60
/
Highspeed pascal.adf
/
Interface
/
Potgo.pas
< prev
next >
Wrap
Pascal/Delphi Source File
|
1992-01-16
|
290b
|
27 lines
Unit Potgo;
Interface
Uses Exec;
Type
pLibrary = ^tLibrary;
Var
PotgoBase: pLibrary;
Const
POTGONAME = 'potgo.resource';
Function AllocPotBits (bits: Integer): Integer;
Procedure FreePotBits (bits: Integer);
Procedure WritePotgo
(word: Integer;
mask: Integer);
End.